﻿
Imports osi.root.formation
Imports osi.root.template

Friend Class qless_threadpool
    Inherits iqless_threadpool

    Private Sub New()
        MyBase.New(New qless(Of work_info)())
    End Sub

    Public Shared ReadOnly [global] As threadpool = Nothing

    Shared Sub New()
        [global] = New qless_threadpool()
    End Sub

    Public Overloads Shared Sub register()
        threadpool.register([global])
    End Sub
End Class

Friend Class slimqless2_threadpool
    Inherits iqless_threadpool

    Private Sub New()
        MyBase.New(New slimqless2(Of work_info)())
    End Sub

    Public Shared ReadOnly [global] As threadpool = Nothing

    Shared Sub New()
        [global] = New slimqless2_threadpool()
    End Sub

    Public Overloads Shared Sub register()
        threadpool.register([global])
    End Sub
End Class